home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 3 / Cream of the Crop 3.iso / utility / choose20.zip / MENU.BAT < prev    next >
DOS Batch File  |  1993-11-05  |  3KB  |  132 lines
  1. ECHO OFF
  2. CLS
  3. REM -- Test for access to all required files
  4. IF NOT EXIST MANUAL.TXT GOTO :FAULT
  5. IF NOT EXIST REGISTER.FRM GOTO :FAULT
  6. IF NOT EXIST CHOOSE.COM GOTO :FAULT
  7. IF NOT EXIST MAIN.MUX GOTO :FAULT
  8. IF NOT EXIST MM_INT.SDX GOTO :FAULT
  9. IF NOT EXIST MM_SEL.SDX GOTO :FAULT
  10. IF NOT EXIST MM_BRA.SDX GOTO :FAULT
  11. IF NOT EXIST MM_REG.SDX GOTO :FAULT
  12. IF NOT EXIST MM_INS.SDX GOTO :FAULT
  13. IF NOT EXIST MM_WST.SDX GOTO :FAULT
  14. IF NOT EXIST DSP_SPEC.SDX GOTO :FAULT
  15. IF NOT EXIST DSP_TEXT.SDX GOTO :FAULT
  16. IF     EXIST DSP_COLO.SDX GOTO :MAIN_MENU
  17. :FAULT
  18. CLS
  19. ECHO ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  20. ECHO +                                                            +
  21. ECHO +  The files included in your  CHOOSE  package are required  +
  22. ECHO +  to run MENU.BAT, but they were not found  in the current  +
  23. ECHO +  drive/directory and the batch cannot be run.              +
  24. ECHO +                                                            +
  25. ECHO +  Switch to the drive/directory with the CHOOSE files, and  +
  26. ECHO +  try again.                                                +
  27. ECHO +                                                            +
  28. ECHO ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  29. GOTO :END
  30.  
  31. :MAIN_MENU
  32. CLS
  33. CHOOSE MAIN.MUX
  34. IF ERRORLEVEL=9 GOTO :MM_INT
  35. IF ERRORLEVEL=8 GOTO :MM_DSP
  36. IF ERRORLEVEL=7 GOTO :MM_SEL
  37. IF ERRORLEVEL=6 GOTO :MM_BRA
  38. IF ERRORLEVEL=5 GOTO :MM_REG
  39. IF ERRORLEVEL=4 GOTO :MM_MAN
  40. IF ERRORLEVEL=3 GOTO :MM_INS
  41. IF ERRORLEVEL=2 GOTO :MM_WST
  42. IF ERRORLEVEL=1 GOTO :END
  43. GOTO :END
  44.  
  45. :MM_INT -- "Introduction" SELECTION
  46. CLS
  47. TYPE MM_INT.SDX
  48. PAUSE
  49. GOTO :MAIN_MENU
  50.  
  51. :MM_DSP -- "Menu Display" SUB-MENU
  52. CLS
  53. CHOOSE {WCB}MENU DISPLAY^Menu {S}pecification^Special ({003}) & Highlighted Menu {T}ext^Menu {C}olors^{M}ain Menu
  54. IF ERRORLEVEL=4 GOTO :DSP_SPEC
  55. IF ERRORLEVEL=3 GOTO :DSP_TEXT
  56. IF ERRORLEVEL=2 GOTO :DSP_COLO
  57. IF ERRORLEVEL=1 GOTO :MAIN_MENU
  58. GOTO :MAIN_MENU
  59.  
  60. :DSP_SPEC -- "Menu Display"/"Menu Specification" SELECTION
  61. TYPE DSP_SPEC.SDX
  62. PAUSE
  63. GOTO :MM_DSP
  64.  
  65. :DSP_TEXT -- "Menu Display"/"Special & Highlighted Menu Text" SELECTION
  66. TYPE DSP_TEXT.SDX
  67. PAUSE
  68. GOTO :MM_DSP
  69.  
  70. :DSP_COLO -- "Menu Display"/"Menu Colors" SELECTION
  71. TYPE DSP_COLO.SDX
  72. PAUSE
  73. GOTO :MM_DSP
  74.  
  75. :MM_SEL -- "Menu Selection" SELECTION
  76. CLS
  77. TYPE MM_SEL.SDX
  78. PAUSE
  79. GOTO :MAIN_MENU
  80.  
  81. :MM_BRA -- "Batch Branching" SELECTION
  82. CLS
  83. TYPE MM_BRA.SDX
  84. PAUSE
  85. GOTO :MAIN_MENU
  86.  
  87. :MM_REG -- "User Registration" SELECTION
  88. CLS
  89. TYPE MM_REG.SDX
  90. PAUSE
  91. CHOOSE PRINT REGISTRATION FORM?^{007} {Y}es^{007} {N}o
  92. IF ERRORLEVEL=2 GOTO :MM_REG_PNT
  93. GOTO :MAIN_MENU
  94. :MM_REG_PNT
  95. CLS
  96. ECHO PRINTING REGISTRATION FORM
  97. COPY REGISTER.FRM PRN
  98. GOTO :MAIN_MENU
  99.  
  100. :MM_MAN -- "Print Manual" SELECTION
  101. CLS
  102. ECHO PRINTING MANUAL TEXT
  103. COPY MANUAL.TXT PRN
  104. GOTO :MAIN_MENU
  105.  
  106. :MM_INS -- "Install to Drive-C" SELECTION
  107. CLS
  108. TYPE MM_INS.SDX
  109. CHOOSE {BWC}COPY CHOOSE.COM C:\^{007} {Y}es^{007} {N}o
  110. IF ERRORLEVEL=2 GOTO :MM_INS_CPY
  111. GOTO :MAIN_MENU
  112. :MM_INS_CPY
  113. CLS
  114. ECHO Copying CHOOSE to the root directory of Drive-C.
  115. ECHO ON
  116. COPY CHOOSE.COM C:\
  117. ECHO OFF
  118. PAUSE
  119. GOTO :MAIN_MENU
  120.  
  121. :MM_WST -- "Warm start" SELECTION
  122. CLS
  123. TYPE MM_WST.SDX
  124. CHOOSE {WWR}CONFIRM SYSTEM RE-BOOT^Yes^No
  125. CLS
  126. IF ERRORLEVEL=2 GOTO :RE-BOOT
  127. GOTO :MAIN_MENU
  128. :RE-BOOT
  129. CHOOSE RE-BOOT
  130.  
  131. :END
  132.